library(shiny)
library(ECharts2Shiny)
# Prepare sample data for plotting ---------------------------------------
dat <- data.frame(x = iris$Sepal.Length,
y = iris$Sepal.Width,
group = iris$Species)
shinyServer(function(input, output) {
# Call functions from ECharts2Shiny to render charts
# Scatter plot
renderScatter("test_scatter", data = dat,
point.type = c('diamond', 'rect', 'triangle'))
}
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.